home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / v10n16.arc / DELBEFOR.BAT < prev    next >
DOS Batch File  |  1991-08-27  |  674b  |  35 lines
  1. @ECHO OFF
  2. IF '%1'=='' GOTO syntax
  3. IF NOT '%2'=='' GOTO syntax
  4. ATTRIB +A *.*
  5. MD TEMPDIR.$$$
  6. XCOPY *.* TEMPDIR.$$$\*.* /M /D:%1
  7. IF ERRORLEVEL 1 GOTO error1
  8. ECHO Put a backup diskette in drive A: and
  9. PAUSE
  10. XCOPY *.* A: /M
  11. IF ERRORLEVEL 1 GOTO error2
  12. IF NOT EXIST *.* GOTO NoFiles1
  13. ECHO Y | DEL *.* > NUL
  14. :NoFiles1
  15. COPY TEMPDIR.$$$\*.*
  16. GOTO cleanup
  17.  
  18. :syntax
  19. ECHO SYNTAX "DELBEFOR mm-dd-yy"
  20. GOTO exit
  21.  
  22. :error1
  23. ECHO Error during initial XCOPY.  Aborting.
  24. GOTO cleanup
  25.  
  26. :error2
  27. ECHO Error during archive XCOPY.  Files not deleted.
  28.  
  29. :cleanup
  30. IF NOT EXIST TEMPDIR.$$$\*.* GOTO NoFiles2
  31. ECHO Y | DEL TEMPDIR.$$$ > NUL
  32. :NoFiles2
  33. RD TEMPDIR.$$$
  34. :exit
  35.